	.ORIG x3000
	add r0, r0, r0
	add r0, r0, #-5
	add r0, r0, x1f
	and r0, r0 , r0
	xor r0, r0, x10
	jmp r5
	;jsr x300D
	jsrr r4
	
Lable2
	ldb R0, R1, #10
	ldw R0, R2, x3F
	stb r0, r1, #-3
	stw r0, r2, x10
	
	not r0, r0
	
	lshf  r0, r0, #1
	rshfa r0, r0, xF
	rshfl r0, r0, #7
	
	; traps
	trap x25
	halt
	out
	in
	getc
	puts
	
	; no operands
	ret
	rti
	nop
	nop
	nop
	
	lea r0, Lable2
	
	; BRs
	BR Lable2
	BRnzp Lable2
	BRn Lable2
	BRz Lable2
	BRp Lable2
	BRnz Lable2
	BRzp Lable2
	BRnp Lable2
	
	.FILL x3000
	.FILL #20
	.FILL 'a'
	;.SPACE 5
	
	.END